3.79 \(\int \frac{e^{-a-b x} (a+b x)^4}{(c+d x)^2} \, dx\)

Optimal. Leaf size=258 \[ -\frac{b^3 e^{-a-b x} (c+d x)^2}{d^4}+\frac{4 b^2 e^{-a-b x} (c+d x) (b c-a d)}{d^4}-\frac{2 b^2 e^{-a-b x} (c+d x)}{d^3}-\frac{b e^{\frac{b c}{d}-a} (b c-a d)^4 \text{ExpIntegralEi}\left (-\frac{b (c+d x)}{d}\right )}{d^6}-\frac{4 b e^{\frac{b c}{d}-a} (b c-a d)^3 \text{ExpIntegralEi}\left (-\frac{b (c+d x)}{d}\right )}{d^5}-\frac{e^{-a-b x} (b c-a d)^4}{d^5 (c+d x)}-\frac{6 b e^{-a-b x} (b c-a d)^2}{d^4}+\frac{4 b e^{-a-b x} (b c-a d)}{d^3}-\frac{2 b e^{-a-b x}}{d^2} \]

[Out]

(-2*b*E^(-a - b*x))/d^2 + (4*b*(b*c - a*d)*E^(-a - b*x))/d^3 - (6*b*(b*c - a*d)^
2*E^(-a - b*x))/d^4 - ((b*c - a*d)^4*E^(-a - b*x))/(d^5*(c + d*x)) - (2*b^2*E^(-
a - b*x)*(c + d*x))/d^3 + (4*b^2*(b*c - a*d)*E^(-a - b*x)*(c + d*x))/d^4 - (b^3*
E^(-a - b*x)*(c + d*x)^2)/d^4 - (4*b*(b*c - a*d)^3*E^(-a + (b*c)/d)*ExpIntegralE
i[-((b*(c + d*x))/d)])/d^5 - (b*(b*c - a*d)^4*E^(-a + (b*c)/d)*ExpIntegralEi[-((
b*(c + d*x))/d)])/d^6

_______________________________________________________________________________________

Rubi [A]  time = 0.622479, antiderivative size = 258, normalized size of antiderivative = 1., number of steps used = 11, number of rules used = 5, integrand size = 25, \(\frac{\text{number of rules}}{\text{integrand size}}\) = 0.2 \[ -\frac{b^3 e^{-a-b x} (c+d x)^2}{d^4}+\frac{4 b^2 e^{-a-b x} (c+d x) (b c-a d)}{d^4}-\frac{2 b^2 e^{-a-b x} (c+d x)}{d^3}-\frac{b e^{\frac{b c}{d}-a} (b c-a d)^4 \text{ExpIntegralEi}\left (-\frac{b (c+d x)}{d}\right )}{d^6}-\frac{4 b e^{\frac{b c}{d}-a} (b c-a d)^3 \text{ExpIntegralEi}\left (-\frac{b (c+d x)}{d}\right )}{d^5}-\frac{e^{-a-b x} (b c-a d)^4}{d^5 (c+d x)}-\frac{6 b e^{-a-b x} (b c-a d)^2}{d^4}+\frac{4 b e^{-a-b x} (b c-a d)}{d^3}-\frac{2 b e^{-a-b x}}{d^2} \]

Antiderivative was successfully verified.

[In]  Int[(E^(-a - b*x)*(a + b*x)^4)/(c + d*x)^2,x]

[Out]

(-2*b*E^(-a - b*x))/d^2 + (4*b*(b*c - a*d)*E^(-a - b*x))/d^3 - (6*b*(b*c - a*d)^
2*E^(-a - b*x))/d^4 - ((b*c - a*d)^4*E^(-a - b*x))/(d^5*(c + d*x)) - (2*b^2*E^(-
a - b*x)*(c + d*x))/d^3 + (4*b^2*(b*c - a*d)*E^(-a - b*x)*(c + d*x))/d^4 - (b^3*
E^(-a - b*x)*(c + d*x)^2)/d^4 - (4*b*(b*c - a*d)^3*E^(-a + (b*c)/d)*ExpIntegralE
i[-((b*(c + d*x))/d)])/d^5 - (b*(b*c - a*d)^4*E^(-a + (b*c)/d)*ExpIntegralEi[-((
b*(c + d*x))/d)])/d^6

_______________________________________________________________________________________

Rubi in Sympy [A]  time = 63.1004, size = 230, normalized size = 0.89 \[ - \frac{b^{3} \left (c + d x\right )^{2} e^{- a - b x}}{d^{4}} - \frac{2 b^{2} \left (c + d x\right ) e^{- a - b x}}{d^{3}} - \frac{4 b^{2} \left (c + d x\right ) \left (a d - b c\right ) e^{- a - b x}}{d^{4}} - \frac{2 b e^{- a - b x}}{d^{2}} - \frac{4 b \left (a d - b c\right ) e^{- a - b x}}{d^{3}} - \frac{6 b \left (a d - b c\right )^{2} e^{- a - b x}}{d^{4}} + \frac{4 b \left (a d - b c\right )^{3} e^{- a} e^{\frac{b c}{d}} \operatorname{Ei}{\left (\frac{b \left (- c - d x\right )}{d} \right )}}{d^{5}} - \frac{b \left (a d - b c\right )^{4} e^{- a + \frac{b c}{d}} \operatorname{Ei}{\left (\frac{b \left (- c - d x\right )}{d} \right )}}{d^{6}} - \frac{\left (a d - b c\right )^{4} e^{- a - b x}}{d^{5} \left (c + d x\right )} \]

Verification of antiderivative is not currently implemented for this CAS.

[In]  rubi_integrate(exp(-b*x-a)*(b*x+a)**4/(d*x+c)**2,x)

[Out]

-b**3*(c + d*x)**2*exp(-a - b*x)/d**4 - 2*b**2*(c + d*x)*exp(-a - b*x)/d**3 - 4*
b**2*(c + d*x)*(a*d - b*c)*exp(-a - b*x)/d**4 - 2*b*exp(-a - b*x)/d**2 - 4*b*(a*
d - b*c)*exp(-a - b*x)/d**3 - 6*b*(a*d - b*c)**2*exp(-a - b*x)/d**4 + 4*b*(a*d -
b*c)**3*exp(-a)*exp(b*c/d)*Ei(b*(-c - d*x)/d)/d**5 - b*(a*d - b*c)**4*exp(-a +
b*c/d)*Ei(b*(-c - d*x)/d)/d**6 - (a*d - b*c)**4*exp(-a - b*x)/(d**5*(c + d*x))

_______________________________________________________________________________________

Mathematica [A]  time = 0.321389, size = 163, normalized size = 0.63 \[ \frac{e^{-a} \left (-\frac{d e^{-b x} \left (b d (c+d x) \left (2 \left (3 a^2+2 a+1\right ) d^2-2 (4 a+1) b c d+3 b^2 c^2\right )-2 b^2 d^2 x (c+d x) (b c-(2 a+1) d)+(b c-a d)^4+b^3 d^3 x^2 (c+d x)\right )}{c+d x}-b e^{\frac{b c}{d}} (b c-(a-4) d) (b c-a d)^3 \text{ExpIntegralEi}\left (-\frac{b (c+d x)}{d}\right )\right )}{d^6} \]

Antiderivative was successfully verified.

[In]  Integrate[(E^(-a - b*x)*(a + b*x)^4)/(c + d*x)^2,x]

[Out]

(-((d*((b*c - a*d)^4 + b*d*(3*b^2*c^2 - 2*(1 + 4*a)*b*c*d + 2*(1 + 2*a + 3*a^2)*
d^2)*(c + d*x) - 2*b^2*d^2*(b*c - (1 + 2*a)*d)*x*(c + d*x) + b^3*d^3*x^2*(c + d*
x)))/(E^(b*x)*(c + d*x))) - b*(b*c - (-4 + a)*d)*(b*c - a*d)^3*E^((b*c)/d)*ExpIn
tegralEi[-((b*(c + d*x))/d)])/(d^6*E^a)

_______________________________________________________________________________________

Maple [A]  time = 0.02, size = 406, normalized size = 1.6 \[ -{\frac{1}{b} \left ({\frac{{b}^{2} \left ( \left ( -bx-a \right ) ^{2}{{\rm e}^{-bx-a}}-2\, \left ( -bx-a \right ){{\rm e}^{-bx-a}}+2\,{{\rm e}^{-bx-a}} \right ) }{{d}^{2}}}-2\,{\frac{{b}^{2}a \left ( \left ( -bx-a \right ){{\rm e}^{-bx-a}}-{{\rm e}^{-bx-a}} \right ) }{{d}^{2}}}+2\,{\frac{c{b}^{3} \left ( \left ( -bx-a \right ){{\rm e}^{-bx-a}}-{{\rm e}^{-bx-a}} \right ) }{{d}^{3}}}+3\,{\frac{{a}^{2}{b}^{2}{{\rm e}^{-bx-a}}}{{d}^{2}}}-6\,{\frac{a{b}^{3}c{{\rm e}^{-bx-a}}}{{d}^{3}}}+3\,{\frac{{b}^{4}{c}^{2}{{\rm e}^{-bx-a}}}{{d}^{4}}}+4\,{\frac{ \left ({a}^{3}{d}^{3}-3\,{a}^{2}bc{d}^{2}+3\,a{b}^{2}{c}^{2}d-{b}^{3}{c}^{3} \right ){b}^{2}}{{d}^{5}}{{\rm e}^{-{\frac{ad-cb}{d}}}}{\it Ei} \left ( 1,bx+a-{\frac{ad-cb}{d}} \right ) }+{\frac{ \left ({a}^{4}{d}^{4}-4\,{a}^{3}bc{d}^{3}+6\,{a}^{2}{b}^{2}{c}^{2}{d}^{2}-4\,a{b}^{3}{c}^{3}d+{b}^{4}{c}^{4} \right ){b}^{2}}{{d}^{6}} \left ( -{{{\rm e}^{-bx-a}} \left ( -bx-a+{\frac{ad-cb}{d}} \right ) ^{-1}}-{{\rm e}^{-{\frac{ad-cb}{d}}}}{\it Ei} \left ( 1,bx+a-{\frac{ad-cb}{d}} \right ) \right ) } \right ) } \]

Verification of antiderivative is not currently implemented for this CAS.

[In]  int(exp(-b*x-a)*(b*x+a)^4/(d*x+c)^2,x)

[Out]

-1/b*(b^2/d^2*((-b*x-a)^2*exp(-b*x-a)-2*(-b*x-a)*exp(-b*x-a)+2*exp(-b*x-a))-2*b^
2/d^2*a*((-b*x-a)*exp(-b*x-a)-exp(-b*x-a))+2*b^3/d^3*c*((-b*x-a)*exp(-b*x-a)-exp
(-b*x-a))+3*b^2/d^2*a^2*exp(-b*x-a)-6*b^3/d^3*a*c*exp(-b*x-a)+3*b^4/d^4*c^2*exp(
-b*x-a)+4/d^5*(a^3*d^3-3*a^2*b*c*d^2+3*a*b^2*c^2*d-b^3*c^3)*b^2*exp(-(a*d-b*c)/d
)*Ei(1,b*x+a-(a*d-b*c)/d)+(a^4*d^4-4*a^3*b*c*d^3+6*a^2*b^2*c^2*d^2-4*a*b^3*c^3*d
+b^4*c^4)*b^2/d^6*(-exp(-b*x-a)/(-b*x-a+(a*d-b*c)/d)-exp(-(a*d-b*c)/d)*Ei(1,b*x+
a-(a*d-b*c)/d)))

_______________________________________________________________________________________

Maxima [F]  time = 0., size = 0, normalized size = 0. \[ -\frac{a^{4} e^{\left (-a + \frac{b c}{d}\right )} exp_integral_e\left (2, \frac{{\left (d x + c\right )} b}{d}\right )}{{\left (d x + c\right )} d} - \frac{{\left (b^{3} d^{2} x^{4} + 2 \,{\left (2 \, a b^{2} d^{2} + b^{2} d^{2}\right )} x^{3} + 2 \,{\left (3 \, a^{2} b d^{2} + b^{2} c d + 2 \, a b d^{2} + b d^{2}\right )} x^{2} + 2 \,{\left (2 \, a^{3} d^{2} - b^{2} c^{2} + 4 \, a b c d + 2 \, b c d\right )} x\right )} e^{\left (-b x\right )}}{d^{4} x^{2} e^{a} + 2 \, c d^{3} x e^{a} + c^{2} d^{2} e^{a}} - \int -\frac{2 \,{\left (2 \, a^{3} c d^{2} - b^{2} c^{3} + 4 \, a b c^{2} d + 2 \, b c^{2} d +{\left (b^{3} c^{3} - 4 \, a b^{2} c^{2} d + 6 \, a^{2} b c d^{2} - 2 \, a^{3} d^{3} + b^{2} c^{2} d\right )} x\right )} e^{\left (-b x\right )}}{d^{5} x^{3} e^{a} + 3 \, c d^{4} x^{2} e^{a} + 3 \, c^{2} d^{3} x e^{a} + c^{3} d^{2} e^{a}}\,{d x} \]

Verification of antiderivative is not currently implemented for this CAS.

[In]  integrate((b*x + a)^4*e^(-b*x - a)/(d*x + c)^2,x, algorithm="maxima")

[Out]

-a^4*e^(-a + b*c/d)*exp_integral_e(2, (d*x + c)*b/d)/((d*x + c)*d) - (b^3*d^2*x^
4 + 2*(2*a*b^2*d^2 + b^2*d^2)*x^3 + 2*(3*a^2*b*d^2 + b^2*c*d + 2*a*b*d^2 + b*d^2
)*x^2 + 2*(2*a^3*d^2 - b^2*c^2 + 4*a*b*c*d + 2*b*c*d)*x)*e^(-b*x)/(d^4*x^2*e^a +
2*c*d^3*x*e^a + c^2*d^2*e^a) - integrate(-2*(2*a^3*c*d^2 - b^2*c^3 + 4*a*b*c^2*
d + 2*b*c^2*d + (b^3*c^3 - 4*a*b^2*c^2*d + 6*a^2*b*c*d^2 - 2*a^3*d^3 + b^2*c^2*d
)*x)*e^(-b*x)/(d^5*x^3*e^a + 3*c*d^4*x^2*e^a + 3*c^2*d^3*x*e^a + c^3*d^2*e^a), x
)

_______________________________________________________________________________________

Fricas [A]  time = 0.266609, size = 477, normalized size = 1.85 \[ -\frac{{\left (b^{5} c^{5} - 4 \,{\left (a - 1\right )} b^{4} c^{4} d + 6 \,{\left (a^{2} - 2 \, a\right )} b^{3} c^{3} d^{2} - 4 \,{\left (a^{3} - 3 \, a^{2}\right )} b^{2} c^{2} d^{3} +{\left (a^{4} - 4 \, a^{3}\right )} b c d^{4} +{\left (b^{5} c^{4} d - 4 \,{\left (a - 1\right )} b^{4} c^{3} d^{2} + 6 \,{\left (a^{2} - 2 \, a\right )} b^{3} c^{2} d^{3} - 4 \,{\left (a^{3} - 3 \, a^{2}\right )} b^{2} c d^{4} +{\left (a^{4} - 4 \, a^{3}\right )} b d^{5}\right )} x\right )}{\rm Ei}\left (-\frac{b d x + b c}{d}\right ) e^{\left (\frac{b c - a d}{d}\right )} +{\left (b^{3} d^{5} x^{3} + b^{4} c^{4} d -{\left (4 \, a - 3\right )} b^{3} c^{3} d^{2} + a^{4} d^{5} + 2 \,{\left (3 \, a^{2} - 4 \, a - 1\right )} b^{2} c^{2} d^{3} - 2 \,{\left (2 \, a^{3} - 3 \, a^{2} - 2 \, a - 1\right )} b c d^{4} -{\left (b^{3} c d^{4} - 2 \,{\left (2 \, a + 1\right )} b^{2} d^{5}\right )} x^{2} +{\left (b^{3} c^{2} d^{3} - 4 \, a b^{2} c d^{4} + 2 \,{\left (3 \, a^{2} + 2 \, a + 1\right )} b d^{5}\right )} x\right )} e^{\left (-b x - a\right )}}{d^{7} x + c d^{6}} \]

Verification of antiderivative is not currently implemented for this CAS.

[In]  integrate((b*x + a)^4*e^(-b*x - a)/(d*x + c)^2,x, algorithm="fricas")

[Out]

-((b^5*c^5 - 4*(a - 1)*b^4*c^4*d + 6*(a^2 - 2*a)*b^3*c^3*d^2 - 4*(a^3 - 3*a^2)*b
^2*c^2*d^3 + (a^4 - 4*a^3)*b*c*d^4 + (b^5*c^4*d - 4*(a - 1)*b^4*c^3*d^2 + 6*(a^2
- 2*a)*b^3*c^2*d^3 - 4*(a^3 - 3*a^2)*b^2*c*d^4 + (a^4 - 4*a^3)*b*d^5)*x)*Ei(-(b
*d*x + b*c)/d)*e^((b*c - a*d)/d) + (b^3*d^5*x^3 + b^4*c^4*d - (4*a - 3)*b^3*c^3*
d^2 + a^4*d^5 + 2*(3*a^2 - 4*a - 1)*b^2*c^2*d^3 - 2*(2*a^3 - 3*a^2 - 2*a - 1)*b*
c*d^4 - (b^3*c*d^4 - 2*(2*a + 1)*b^2*d^5)*x^2 + (b^3*c^2*d^3 - 4*a*b^2*c*d^4 + 2
*(3*a^2 + 2*a + 1)*b*d^5)*x)*e^(-b*x - a))/(d^7*x + c*d^6)

_______________________________________________________________________________________

Sympy [F(-1)]  time = 0., size = 0, normalized size = 0. \[ \text{Timed out} \]

Verification of antiderivative is not currently implemented for this CAS.

[In]  integrate(exp(-b*x-a)*(b*x+a)**4/(d*x+c)**2,x)

[Out]

Timed out

_______________________________________________________________________________________

GIAC/XCAS [F]  time = 0., size = 0, normalized size = 0. \[ \mathit{undef} \]

Verification of antiderivative is not currently implemented for this CAS.

[In]  integrate((b*x + a)^4*e^(-b*x - a)/(d*x + c)^2,x, algorithm="giac")

[Out]

undef